home *** CD-ROM | disk | FTP | other *** search
/ Amiga Arena Homepage / Amiga Arena Homepage CD Rom Edition.iso / Programme / Demoversionen / Anwender / WBInfoV3demo / Install.Workbench < prev    next >
Text File  |  1977-12-31  |  3KB  |  111 lines
  1. ; Installer for WBInfo V3 (6.2.2000)
  2. (SET @default-dest "SYS:WBStartup/")
  3. (SET @default-docdir "HELP:")
  4. (SET default_lang 0)
  5.  
  6. ; ***** english texts *****
  7.  
  8. (SET #needKick (CAT "\nWBInfo needs Workbench Version 38 at least." ) )
  9.  
  10. (SET #startMsg (CAT "\nWBInfo 3.0 - the ultimate information replacement !\n\n"
  11.                      "This script installs WBInfo on your AMIGA.\n\n") )
  12.  
  13. (SET #destPrompt (CAT "Please choose the destination directory for WBInfo.\n" ) )
  14.  
  15. (SET #copyPFiles (CAT "Copying program files") )
  16.  
  17. (SET #langPrompt (CAT "Select the languages you wish to use with WBInfo.") )
  18.  
  19. (SET #DocPrompt (CAT "Select the directory for the documentation file.") )
  20.  
  21. (SET #exitMsg (CAT "WBInfo installation succeeded\nYou should reboot now.") )
  22.  
  23. ; ***** german texts *****
  24.  
  25. (IF (= @language "deutsch")
  26. (
  27. (SET default_lang 1)
  28.  
  29. (SET #needKick (CAT "\nWBInfo benötigt mindestens die Workbench-Version 38." ) )
  30.  
  31. (SET #startMsg (CAT "\n\WBInfo 3.0 - der ultimative informations ersatz !\n\n"
  32.                      "Diese Datei installiert WBInfo auf ihrem AMIGA.\n\n") )
  33.  
  34. (SET #destPrompt (CAT "Wählen Sie bitte das Zielverzeichnis für WBInfo.\n") )
  35.  
  36. (SET #copyPFiles (CAT "Kopiere Programmdateien") )
  37.  
  38. (SET #langPrompt (CAT "Wählen Sie die Sprachen, die Sie mit WBInfo benutzen wollen.") )
  39.  
  40. (SET #DocPrompt (CAT "Wählen Sie ein Verzeichnis, in welches die Dokumentation kopiert werden soll.") )
  41.  
  42. (SET #exitMsg (CAT "WBInfo wurde erfolgreich installiert!\n Sie sollten nun das System neustarten.") )
  43. )
  44. )
  45.  
  46. ; ***** start installation *****
  47.  
  48. (if (< (/ (GETVERSION) 65536) 38)
  49.     (ABORT #needKick)
  50. )
  51.  
  52. (MESSAGE #startMsg)
  53.  
  54. ; ***** get dest dir for WBInfo *****
  55.  
  56. (SET @default-dest
  57.     (ASKDIR (PROMPT  #destPrompt)
  58.             (HELP    askdir-help)
  59.             (DEFAULT @default-dest )))
  60.  
  61. (COPYFILES (SOURCE "Workbench/WBInfo")
  62.            (DEST @default-dest )
  63.            (HELP copyfiles-help)
  64.            (INFOS)
  65.            (NOPOSITION)
  66. )
  67.  
  68. ; ***** install some languages *****
  69.  
  70. (SET sprachen (ASKOPTIONS (PROMPT #langPrompt)
  71.                           (HELP   askoptions-help)
  72.                           (CHOICES "english"
  73.                                    "deutsch"
  74.                           )
  75.                           (DEFAULT (+ default_lang 0) )
  76.               )
  77. )
  78.  
  79. (if (IN sprachen 1)
  80.     (COPYFILES (SOURCE "catalogs/deutsch/WBInfo3.catalog")
  81.                (DEST "Locale:Catalogs/deutsch") )
  82. )
  83. ; ***** get dest for doc files *****
  84.  
  85. (SET @DocDir
  86.     (ASKDIR (PROMPT  #DocPrompt)
  87.             (HELP    askdir-help)
  88.             (DEFAULT @default-docdir)
  89.             (NEWPATH)
  90.     )
  91. )
  92.  
  93. ; ***** install doc files *****
  94.  
  95. (if (IN sprachen 0)
  96.   (SET SDocDir  "docs/english")
  97. )
  98.   
  99. (if (IN sprachen 1)
  100.   (SET SDocDir "docs/deutsch")
  101. )  
  102.  
  103. (COPYFILES (SOURCE  SDocDir)
  104.            (DEST    @DocDir)
  105.            (CHOICES "WBInfo.guide")
  106.            (INFOS)
  107.            (NOPOSITION)
  108. )
  109.  
  110. (EXIT #exitMsg)
  111.